﻿Imports System.IO
Module Module1
  Sub Main()
    ' apro il file
    Dim fs As New StreamWriter(
        "C:\Users\Mario\Desktop\Es02_04.txt", True)
    ' scrivo nel file
    fs.WriteLine("Prova")
    ' chiudo il file
    fs.Close()
    ' rilascio il riferimento all'oggetto
    fs = Nothing
  End Sub

  Sub CalcoloComplesso()
    ' TODO: metodo da implementare
  End Sub
End Module
